8
How do I put a picture on the control's center top side

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperCenter
	Set ComValue to 50
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
7
How do I put a picture on the control's right top corner

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperRight
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
	Set ComValue to 50
End_Procedure
6
How do I put a picture on the control's left top corner

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComPictureDisplay to OLEUpperLeft
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
	Set ComValue to 50
End_Procedure
5
How do I put a picture on the control's background

Procedure OnCreate
	Forward Send OnCreate
	Variant vPicture
	Get ComExecuteTemplate "loadpicture(`c:\exontrol\images\zipdisk.gif`)" to vPicture
	Set ComPicture to (vPicture)
	Set ComVisiblePart OLEexBackgroundPart to False
	Set ComBackColor to |CI$80000004
End_Procedure
4
How can I change the size of control's font

Procedure OnCreate
	Forward Send OnCreate
	Variant voStdFont
	Get ComFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComSize of hoStdFont to 12
	Send Destroy to hoStdFont
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
3
How do I change the control's font

Procedure OnCreate
	Forward Send OnCreate
	Variant voStdFont
	Get ComFont to voStdFont
	Handle hoStdFont
	Get Create (RefClass(cComStdFont)) to hoStdFont
	Set pvComObject of hoStdFont to voStdFont
		Set ComName of hoStdFont to "Tahoma"
	Send Destroy to hoStdFont
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
2
How can I change the control's foreground color

Procedure OnCreate
	Forward Send OnCreate
	Set ComForeColor to (RGB(255,0,0))
	Set ComCaption OLEexThumbPart to "<img>0</img>thumb"
End_Procedure
1
How can I change the control's background color

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackColor to (RGB(0,255,0))
	Set ComVisiblePart OLEexBackgroundPart to False
End_Procedure